home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / systems / mac / euro-oztex / EOT2.1#3.sea.bin / TeX-inputs / STY / showkeys.sty < prev    next >
Text File  |  1995-01-04  |  3KB  |  96 lines
  1. %% 
  2. %% This is file `showkeys.sty', generated 
  3. %% on <1995/1/4> with the docstrip utility (2.2i).
  4. %% 
  5. %% The original source files were:
  6. %% 
  7. %% showkeys.dtx  (with options: `package')
  8. %% 
  9. %% IMPORTANT NOTICE: 
  10. %% This file is part of the `tools' bundle 
  11. %% in the LaTeX2e distribution. 
  12. %% 
  13. %% You are not allowed to distribute this file. 
  14. %% For distribution of the original source see 
  15. %% the copyright notice in the source file, and 
  16. %% in the file readme.txt distributed with the 
  17. %% tools bundle. 
  18. %% 
  19. %% File: showkeys.dtx Copyright (C) 1992-1994 David Carlisle
  20. \NeedsTeXFormat{LaTeX2e}
  21. \ProvidesPackage{showkeys}
  22.          [1994/01/31 v2.00 Show cite and label keys (DPC)]
  23. \NeedsTeXFormat{LaTeX2e}
  24. \ProvidesPackage{showkeys}
  25. \wlog{Package: showkeys \csname ver@showkeys.sty\endcsname}
  26. \let\SK@label\label
  27. \let\SK@bibitem\@bibitem
  28. \let\SK@lbibitem\@lbibitem
  29. \let\SK@ref\ref
  30. \let\SK@pageref\pageref
  31. \let\SK@citex\@citex
  32. \let\SK@tagform@\tagform@
  33. \let\SK@eqnnum\@eqnnum
  34. \def\label#1{\@bsphack\SK@\SK@@label{#1}\SK@label{#1}\@esphack}
  35. \def\@bibitem#1{\SK@\SK@@label{#1}\SK@bibitem{#1}\ignorespaces}
  36. \def\@lbibitem[#1]#2{%
  37.   \SK@\SK@@label{#2}\SK@lbibitem[#1]{#2}\ignorespaces}
  38. \def\SK@#1#2{\def\@tempa{#2}\expandafter#1\meaning\@tempa\SK@}
  39. \def\SK@@label#1>#2\SK@{%
  40.   \gdef\SK@lab{\smash{\fbox{\reset@font\small\ttfamily#2}}}%
  41.   \ifvmode
  42.     \ifinner
  43.       \if@inlabel
  44.         \mbox{}\let\@tempa\SK@lab
  45.                 \def\SK@lab{\llap{\@tempa\kern\leftmargin}}%
  46.       \fi
  47.       \setbox\z@=\lastbox
  48.       \ifvoid\z@
  49.         \nointerlineskip\SK@labx
  50.       \else
  51.         \hbox{\box\z@\SK@labx}%
  52.       \fi
  53.     \else
  54.       \marginpar{\SK@lab}\SK@lab@relax
  55.     \fi
  56.   \else
  57.     \csname SK@\@currenvir\endcsname
  58.     \ifSK@equation\else\SK@labx\fi
  59.   \fi}
  60. \AtBeginDocument{%
  61.   \def\@tempa{\let\iftagsleft@\iffalse}%
  62.   \ifx\iftagsleft@\undefined\@tempa\fi%
  63.   \iftagsleft@
  64.     \def\tagform@#1{\llap{\SK@lab\kern\marginparsep}%
  65.                      \SK@lab@relax\SK@tagform@{#1}}%
  66.     \def\@eqnnum{\llap{\SK@lab\kern\displaywidth\kern\marginparsep}%
  67.                      \SK@lab@relax\SK@eqnnum}%
  68.   \else
  69.     \def\tagform@#1{\SK@tagform@{#1}%
  70.                      \rlap{\kern\marginparsep\SK@lab}\SK@lab@relax}%
  71.     \def\@eqnnum{\SK@eqnnum\rlap{\kern\marginparsep\SK@lab}%
  72.                      \SK@lab@relax}%
  73.   \fi}
  74. \def\SK@labx{\rlap\SK@lab\global\let\SK@lab\relax}
  75. \def\SK@lab@relax{\global\let\SK@lab\relax}\SK@lab@relax
  76. \newif\ifSK@equation
  77. \let\SK@equation\SK@equationtrue
  78. \let\SK@eqnarray\SK@equationtrue
  79. \let\SK@align\SK@equationtrue
  80. \let\SK@alignat\SK@equationtrue
  81. \let\SK@xalignat\SK@equationtrue
  82. \let\SK@xxalignat\SK@equationtrue
  83. \let\SK@gather\SK@equationtrue
  84. \let\SK@multline\SK@equationtrue
  85. \def\ref#1{\SK@\SK@@ref{#1}\SK@ref{#1}}
  86. \def\pageref#1{\SK@\SK@@ref{#1}\SK@pageref{#1}}
  87. \def\@citex[#1]#2{\SK@\SK@@ref{#2}\SK@citex[#1]{#2}}
  88. \def\SK@@ref#1>#2\SK@{%
  89.   \leavevmode\vbox to \z@{\vss
  90.     \rlap{\vrule\raise .75em
  91.        \hbox{\underbar{\reset@font\footnotesize\ttfamily#2}}}}}
  92.  
  93. \endinput
  94. %% 
  95. %% End of file `showkeys.sty'.
  96.